Konstruktionsschritte

l(A;g)

Schritte = 0 (slider from 0 to 6, step 1)
A = (5, 10)
C = (-3, 9)
B = (12, 1.5)
g = Line(C, B)
abstandAg = Distance(A, g)
k_1 = Circle(A, abstandAg + 2.0)
TextAg: "\overline{" + (Name[A]) + (Name[g]) + "} \, = \, " + abstandAg
S_1, S_2 = Intersect(k_1, g)
k_2 = Circle(S_1, A)
k_3 = Circle(S_2, A)
D, S_3 = Intersect(k_2, k_3)
a = Line(A, S_3)